tract.big.tbl.21 <- psrccensus::get_acs_recs(geography='tract',table.names=c('B02011'),years=c(2021))
## Getting data from the 2017-2021 5-year ACS
create_tract_map(tract.tbl=tract.big.tbl.21, tract.lyr=tract.lyr,
map.title.position='topleft', legend.title='Asian Alone or in Combination Population',
legend.subtitle='ACS 2021 (5 yr)')